home *** CD-ROM | disk | FTP | other *** search
/ NetNews Offline 2 / NetNews Offline Volume 2.iso / news / comp / lang / modula2 / 552 < prev    next >
Encoding:
Internet Message Format  |  1996-08-06  |  977 b 
  1. Path: braddon.its.utas.edu.au!usenet
  2. From: Pavel Sakov <Pavel.Sakov@appcomp.utas.edu.au>
  3. Newsgroups: comp.lang.modula2
  4. Subject: Re: Executing Files From Modula 2
  5. Date: Thu, 18 Apr 1996 19:33:50 -0900
  6. Organization: University of Tasmania
  7. Message-ID: <317717AE.6F70@appcomp.utas.edu.au>
  8. References: <MXNuGB.BOXC@csh-newsserver.csh.rit.edu>
  9. NNTP-Posting-Host: pc153.appcomp.utas.edu.au
  10. Mime-Version: 1.0
  11. Content-Type: text/plain; charset=us-ascii
  12. Content-Transfer-Encoding: 7bit
  13. X-Mailer: Mozilla 2.0 (Win16; I)
  14.  
  15. Andy Blake wrote:
  16. > 
  17. > I am wondering if there is any simple way in which I can run executable
  18. > files (such as an MS-DOS command) from Modula 2.  All of the ways that 
  19.  
  20. With TopSpeed 1.17 you write:
  21.  
  22.     Storage.ALLOCATE( address, MAX( CARDINAL));
  23.         error_code := Lib.Execute( program, command_line, address,12000);
  24.     IF error_code # 0 THEN
  25.         ... (* error, DOS error code = error_code *)
  26.     END
  27.     Storage.DEALLOCATE( address, MAX( CARDINAL));
  28.  
  29. Thats all.
  30. Pavel Sakov
  31.